home *** CD-ROM | disk | FTP | other *** search
/ Word Perfect Main Street: Paper Planes / WordPerfect Main Street - Paper Planes.iso / mac / p25-28 / 00066_Script_66 < prev    next >
Text File  |  1994-07-31  |  380b  |  17 lines
  1. -- universal step audio
  2. on exitFrame
  3.   global Plane, Step
  4.   if Step < 10 then
  5.     set theFile = "STEP0"
  6.   else
  7.     set theFile = "STEP"
  8.   end if
  9.   set theFolder = "P" & string(Plane) & ":Audio:"
  10.   set theStep = theFile & string(Step) & ".AIF"
  11.   
  12.   when mouseDown then doCancelAudio
  13.   startAnnotTimer()
  14.   sound playFile 1, the pathname & theFolder & theStep
  15.   
  16. end
  17.